﻿
Namespace AdvanceWarsNet.Game

    Public Class GameElement

        Public Const DESCRIPTION_FORMAT As String = "{0}_Des"

        ReadOnly Property Id As Integer
            Get
                Return mId
            End Get
        End Property
        Private mId As Integer

        Sub New(ByVal id As Integer)
            mId = id
        End Sub

        ReadOnly Property Name As String
            Get
                Return mName
            End Get
        End Property
        Protected mName As String

        ReadOnly Property Description As String
            Get
                Return String.Format(DESCRIPTION_FORMAT, Name)
            End Get
        End Property

        Public Overrides Function ToString() As String
            Return Name
        End Function

    End Class

End Namespace